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Figure 2 
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^placeCDFdiff = Compile[{a.b,A|, Module[ 

* Computes Flb,Al - Fla,A] where F is the Laplace CDF *) 

,* John Kitchin. HP •) 

'* Underling Laplace PDF is Exp[-Abs[t]/2 , so scale factor = 1 •) 

'* Underlying Uniform is Uniform on [-a,a] *) 

I* so A is in units of the Scale Factor *} 

r = eo. 

s = eD, 

t = e^. 

u = tZ; 

<\ = 4At; . 
If[b<-A, lf[a<-A, (s-r) (-1+t2). 
lf[a<A. -8-l+r+8t2-2t(a+A). -1-sr+tW-4rtA 
lf[b<A. lf[a<-A,i-s+r-rt2+2t(b+A), lf[a<A. i -s- f +r+2(b-a) 
.uX,3r4^2-2rt(A-b) J ^,<.,,i,,.L2_rt2+4tA. 

,f[a<A. 1-1 +r-^ +2t(A-a). M^lllf} Iffl/q 



Rgure 4A 
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Figure 4B 



